10 HOME : FOR C = 1 TO 30: VTAB 16: HTAB C: PRINT "=";: NEXT : HTAB 26: VTAB 6: PRINT " _ _": HTAB 26: PRINT "| | |": FOR C = 7 TO 15: HTAB 30: VTAB C: PRINT "|": NEXT : POKE 34,10: POKE 35,15: POKE 33,6: SPEED= 170: FOR X = 1 TO 12: HOME : POKE 32,X: PRINT " O +-- ^ \/ >":D = INT(X/2):Z = D *2:A = X -Z:B = A +13
20 VTAB B: HTAB 5: PRINT "o": NEXT : POKE 32,0: VTAB 13: HTAB 17: PRINT " ":B = 11: POKE 33,40: FOR A = 17 TO 23: HTAB A: VTAB B: PRINT "o": HTAB A: VTAB B: PRINT " ":B = B -1: NEXT : FOR A = 24 TO 26: HTAB A: VTAB 5: PRINT "o": HTAB A: VTAB 5: PRINT " ": NEXT : FOR A = 7 TO 15: HTAB 27: VTAB A: PRINT "o": HTAB 27: VTAB A: PRINT " ": NEXT A: TEXT : SPEED= 255